home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / card_108175.txt < prev    next >
Text File  |  1990-08-14  |  9KB  |  417 lines
  1. -- card: 108175 from stack: in
  2. -- bmap block id: 108905
  3. -- flags: 4000
  4. -- background id: 14423
  5. -- name: Student Report…
  6. ----- HyperTalk script -----
  7. on groupOne shiftKey
  8.   if (the shiftKey is down) or (shiftKey is down) then
  9.     set hilite of target to not hilite of target
  10.   else
  11.     if not hilite of target then
  12.       lock screen
  13.       repeat with index = 4 to 10
  14.         set hilite of button id index to false
  15.       end repeat
  16.       unlock screen
  17.       set hilite of target to true
  18.     end if
  19.   end if
  20. end groupOne
  21.  
  22. on groupTwo shiftKey
  23.   if (the shiftKey is down) or (shiftKey is down) then
  24.     set hilite of target to not hilite of target
  25.   else
  26.     if not hilite of target then
  27.       lock screen
  28.       set hilite of card button 11 to false
  29.       set hilite of card button 12 to false
  30.       set hilite of card button 13 to false
  31.       unlock screen
  32.       set hilite of target to true
  33.     end if
  34.   end if
  35. end groupTwo
  36.  
  37. on closeCard
  38.   repeat with index = 4 to 13
  39.     set hilite of button id index to false
  40.   end repeat
  41.   repeat with index = 14 to 20
  42.     set hilite of button id index to true
  43.   end repeat
  44.   set hilite of card button 21 to false
  45. end closeCard
  46.  
  47.  
  48.  
  49. -- part 1 (button)
  50. -- low flags: 00
  51. -- high flags: 0000
  52. -- rect: left=0 top=0 right=342 bottom=512
  53. -- title width / last selected line: 0
  54. -- icon id / first selected line: 0 / 0
  55. -- text alignment: 1
  56. -- font id: 0
  57. -- text size: 12
  58. -- style flags: 0
  59. -- line height: 16
  60. -- part name: 
  61.  
  62.  
  63. -- part 2 (button)
  64. -- low flags: 00
  65. -- high flags: 2000
  66. -- rect: left=139 top=283 right=301 bottom=217
  67. -- title width / last selected line: 0
  68. -- icon id / first selected line: 0 / 0
  69. -- text alignment: 1
  70. -- font id: 0
  71. -- text size: 12
  72. -- style flags: 0
  73. -- line height: 16
  74. -- part name: Print
  75. ----- HyperTalk script -----
  76. on mouseUp
  77.   lock screen
  78.   go to card "Select Comments" of this background
  79.   unlock screen
  80. end mouseUp
  81.  
  82.  
  83.  
  84. -- part 3 (button)
  85. -- low flags: 00
  86. -- high flags: 2000
  87. -- rect: left=291 top=283 right=301 bottom=369
  88. -- title width / last selected line: 0
  89. -- icon id / first selected line: 0 / 0
  90. -- text alignment: 1
  91. -- font id: 0
  92. -- text size: 12
  93. -- style flags: 0
  94. -- line height: 16
  95. -- part name: Print
  96. ----- HyperTalk script -----
  97. on mouseUp
  98.   lock screen
  99.   pop card
  100.   unlock screen
  101. end mouseUp
  102.  
  103.  
  104.  
  105. -- part 4 (button)
  106. -- low flags: 00
  107. -- high flags: 0000
  108. -- rect: left=73 top=83 right=99 bottom=230
  109. -- title width / last selected line: 0
  110. -- icon id / first selected line: 0 / 0
  111. -- text alignment: 1
  112. -- font id: 0
  113. -- text size: 12
  114. -- style flags: 0
  115. -- line height: 16
  116. -- part name: 
  117. ----- HyperTalk script -----
  118. on mouseUp shiftKey
  119.   groupOne shiftKey
  120. end mouseUp
  121.  
  122.  
  123.  
  124. -- part 5 (button)
  125. -- low flags: 00
  126. -- high flags: 0000
  127. -- rect: left=73 top=99 right=115 bottom=230
  128. -- title width / last selected line: 0
  129. -- icon id / first selected line: 0 / 0
  130. -- text alignment: 1
  131. -- font id: 0
  132. -- text size: 12
  133. -- style flags: 0
  134. -- line height: 16
  135. -- part name: 
  136. ----- HyperTalk script -----
  137. on mouseUp shiftKey
  138.   groupOne shiftKey
  139. end mouseUp
  140.  
  141.  
  142.  
  143. -- part 6 (button)
  144. -- low flags: 00
  145. -- high flags: 0000
  146. -- rect: left=73 top=115 right=131 bottom=230
  147. -- title width / last selected line: 0
  148. -- icon id / first selected line: 0 / 0
  149. -- text alignment: 1
  150. -- font id: 0
  151. -- text size: 12
  152. -- style flags: 0
  153. -- line height: 16
  154. -- part name: 
  155. ----- HyperTalk script -----
  156. on mouseUp shiftKey
  157.   groupOne shiftKey
  158. end mouseUp
  159.  
  160.  
  161.  
  162. -- part 7 (button)
  163. -- low flags: 00
  164. -- high flags: 0000
  165. -- rect: left=73 top=131 right=147 bottom=230
  166. -- title width / last selected line: 0
  167. -- icon id / first selected line: 0 / 0
  168. -- text alignment: 1
  169. -- font id: 0
  170. -- text size: 12
  171. -- style flags: 0
  172. -- line height: 16
  173. -- part name: 
  174. ----- HyperTalk script -----
  175. on mouseUp shiftKey
  176.   groupOne shiftKey
  177. end mouseUp
  178.  
  179.  
  180.  
  181. -- part 8 (button)
  182. -- low flags: 00
  183. -- high flags: 0000
  184. -- rect: left=73 top=147 right=163 bottom=230
  185. -- title width / last selected line: 0
  186. -- icon id / first selected line: 0 / 0
  187. -- text alignment: 1
  188. -- font id: 0
  189. -- text size: 12
  190. -- style flags: 0
  191. -- line height: 16
  192. -- part name: 
  193. ----- HyperTalk script -----
  194. on mouseUp shiftKey
  195.   groupOne shiftKey
  196. end mouseUp
  197.  
  198.  
  199.  
  200. -- part 9 (button)
  201. -- low flags: 00
  202. -- high flags: 0000
  203. -- rect: left=73 top=163 right=179 bottom=230
  204. -- title width / last selected line: 0
  205. -- icon id / first selected line: 0 / 0
  206. -- text alignment: 1
  207. -- font id: 0
  208. -- text size: 12
  209. -- style flags: 0
  210. -- line height: 16
  211. -- part name: 
  212. ----- HyperTalk script -----
  213. on mouseUp shiftKey
  214.   groupOne shiftKey
  215. end mouseUp
  216.  
  217.  
  218.  
  219. -- part 10 (button)
  220. -- low flags: 00
  221. -- high flags: 0000
  222. -- rect: left=73 top=179 right=195 bottom=230
  223. -- title width / last selected line: 0
  224. -- icon id / first selected line: 0 / 0
  225. -- text alignment: 1
  226. -- font id: 0
  227. -- text size: 12
  228. -- style flags: 0
  229. -- line height: 16
  230. -- part name: 
  231. ----- HyperTalk script -----
  232. on mouseUp shiftKey
  233.   groupOne shiftKey
  234. end mouseUp
  235.  
  236.  
  237.  
  238. -- part 11 (button)
  239. -- low flags: 00
  240. -- high flags: 0000
  241. -- rect: left=267 top=99 right=115 bottom=424
  242. -- title width / last selected line: 0
  243. -- icon id / first selected line: 0 / 0
  244. -- text alignment: 1
  245. -- font id: 0
  246. -- text size: 12
  247. -- style flags: 0
  248. -- line height: 16
  249. -- part name: 
  250. ----- HyperTalk script -----
  251. on mouseUp shiftKey
  252.   groupTwo shiftKey
  253. end mouseUp
  254.  
  255.  
  256.  
  257. -- part 12 (button)
  258. -- low flags: 00
  259. -- high flags: 0000
  260. -- rect: left=267 top=131 right=147 bottom=424
  261. -- title width / last selected line: 0
  262. -- icon id / first selected line: 0 / 0
  263. -- text alignment: 1
  264. -- font id: 0
  265. -- text size: 12
  266. -- style flags: 0
  267. -- line height: 16
  268. -- part name: 
  269. ----- HyperTalk script -----
  270. on mouseUp shiftKey
  271.   groupTwo shiftKey
  272. end mouseUp
  273.  
  274.  
  275.  
  276. -- part 13 (button)
  277. -- low flags: 00
  278. -- high flags: 0000
  279. -- rect: left=267 top=163 right=179 bottom=424
  280. -- title width / last selected line: 0
  281. -- icon id / first selected line: 0 / 0
  282. -- text alignment: 1
  283. -- font id: 0
  284. -- text size: 12
  285. -- style flags: 0
  286. -- line height: 16
  287. -- part name: 
  288. ----- HyperTalk script -----
  289. on mouseUp shiftKey
  290.   groupTwo shiftKey
  291. end mouseUp
  292.  
  293.  
  294.  
  295. -- part 14 (button)
  296. -- low flags: 00
  297. -- high flags: E005
  298. -- rect: left=71 top=224 right=240 bottom=162
  299. -- title width / last selected line: 0
  300. -- icon id / first selected line: 0 / 0
  301. -- text alignment: 1
  302. -- font id: 0
  303. -- text size: 12
  304. -- style flags: 0
  305. -- line height: 16
  306. -- part name: Marks
  307.  
  308.  
  309. -- part 15 (button)
  310. -- low flags: 00
  311. -- high flags: E005
  312. -- rect: left=71 top=240 right=256 bottom=162
  313. -- title width / last selected line: 0
  314. -- icon id / first selected line: 0 / 0
  315. -- text alignment: 1
  316. -- font id: 0
  317. -- text size: 12
  318. -- style flags: 0
  319. -- line height: 16
  320. -- part name: Comments
  321.  
  322.  
  323. -- part 16 (button)
  324. -- low flags: 00
  325. -- high flags: E005
  326. -- rect: left=71 top=256 right=272 bottom=162
  327. -- title width / last selected line: 0
  328. -- icon id / first selected line: 0 / 0
  329. -- text alignment: 1
  330. -- font id: 0
  331. -- text size: 12
  332. -- style flags: 0
  333. -- line height: 16
  334. -- part name: Graph
  335.  
  336.  
  337. -- part 17 (button)
  338. -- low flags: 00
  339. -- high flags: E005
  340. -- rect: left=172 top=224 right=240 bottom=263
  341. -- title width / last selected line: 0
  342. -- icon id / first selected line: 0 / 0
  343. -- text alignment: 1
  344. -- font id: 0
  345. -- text size: 12
  346. -- style flags: 0
  347. -- line height: 16
  348. -- part name: Bin names
  349.  
  350.  
  351. -- part 18 (button)
  352. -- low flags: 00
  353. -- high flags: E005
  354. -- rect: left=172 top=240 right=256 bottom=289
  355. -- title width / last selected line: 0
  356. -- icon id / first selected line: 0 / 0
  357. -- text alignment: 1
  358. -- font id: 0
  359. -- text size: 12
  360. -- style flags: 0
  361. -- line height: 16
  362. -- part name: Class average
  363.  
  364.  
  365. -- part 19 (button)
  366. -- low flags: 00
  367. -- high flags: E005
  368. -- rect: left=172 top=256 right=272 bottom=378
  369. -- title width / last selected line: 0
  370. -- icon id / first selected line: 0 / 0
  371. -- text alignment: 1
  372. -- font id: 0
  373. -- text size: 12
  374. -- style flags: 0
  375. -- line height: 16
  376. -- part name: New page for each student
  377.  
  378.  
  379. -- part 20 (button)
  380. -- low flags: 00
  381. -- high flags: C006
  382. -- rect: left=303 top=222 right=238 bottom=387
  383. -- title width / last selected line: 0
  384. -- icon id / first selected line: 0 / 0
  385. -- text alignment: 1
  386. -- font id: 0
  387. -- text size: 12
  388. -- style flags: 0
  389. -- line height: 16
  390. -- part name: Standard
  391. ----- HyperTalk script -----
  392. on mouseUp
  393.   set hilite of card button "Detailed" to false
  394.   set hilite of me to true
  395. end mouseUp
  396.  
  397.  
  398.  
  399. -- part 21 (button)
  400. -- low flags: 00
  401. -- high flags: 8006
  402. -- rect: left=303 top=238 right=254 bottom=387
  403. -- title width / last selected line: 0
  404. -- icon id / first selected line: 0 / 0
  405. -- text alignment: 1
  406. -- font id: 0
  407. -- text size: 12
  408. -- style flags: 0
  409. -- line height: 16
  410. -- part name: Detailed
  411. ----- HyperTalk script -----
  412. on mouseUp
  413.   set hilite of card button "Standard" to false
  414.   set hilite of me to true
  415. end mouseUp
  416.  
  417.